Fritz: All Fritz/All Fritz.zip/All Fritz/FILES/MISCEOUS/CLUBCONN.LZH/SHORTFRM.FMT

Text File | 1987-04-14 | 2KB | 75 lines

@  2, 22  SAY "DATA SEARCH SERVICE APPLICATION"
@  3, 32  SAY "(SHORTFORM)"
@  5,  3  SAY "Entry Date"
@  5, 14  GET  SHORTFRM->ENTRYDATE
@  5, 23  SAY "Club Memb"
@  5, 33  GET  SHORTFRM->SOC_SEC_NO  PICTURE "999-99-9999"
@  5, 45  SAY "Met of Pay"
@  5, 56  GET  SHORTFRM->MET_OF_PAY
@  5, 65  SAY "AmtPd$"
@  5, 72  GET  SHORTFRM->AMT_PAID
@  6,  3  SAY "Contac/Code"
@  6, 15  GET  SHORTFRM->ROOM
@  6, 17  SAY "Selected Race"
@  6, 33  GET  SHORTFRM->RACE
@  6, 37  SAY "Sex"
@  6, 43  GET  SHORTFRM->SEX
@  6, 45  SAY "Marit Stat"
@  6, 56  GET  SHORTFRM->MARIT_STAT
@  6, 58  SAY "Eye"
@  6, 62  GET  SHORTFRM->EYES
@  6, 65  SAY "Hair ===>"
@  6, 75  GET  SHORTFRM->HAIR
@  7,  3  SAY "Height Rng"
@  7, 14  GET  SHORTFRM->HGT1
@  7, 17  SAY "to"
@  7, 20  GET  SHORTFRM->HGT2
@  7, 24  SAY "Wtg Rng"
@  7, 33  GET  SHORTFRM->WGT1
@  7, 37  SAY "to"
@  7, 41  GET  SHORTFRM->WGT2
@  7, 45  SAY "Occupation"
@  7, 56  GET  SHORTFRM->OCCUPATION
@  7, 67  SAY "Religion"
@  7, 76  GET  SHORTFRM->RELIGION
@  8,  3  SAY "Age Range"
@  8, 14  GET  SHORTFRM->AGE1
@  8, 17  SAY "to"
@  8, 20  GET  SHORTFRM->AGE2
@  8, 24  SAY "Drink"
@  8, 33  GET  SHORTFRM->DRINK
@  8, 36  SAY "Smoker"
@  8, 43  GET  SHORTFRM->SMOKE
@  8, 45  SAY "Education"
@  8, 56  GET  SHORTFRM->SCHOOLING
@  8, 60  SAY "Kids"
@  8, 65  GET  SHORTFRM->CHILDREN
@  8, 67  SAY "Income$"
@  8, 75  GET  SHORTFRM->INCOME
@ 12,  3  SAY "Activities on a Date"
@ 12, 26  GET  SHORTFRM->ACT1
@ 12, 30  GET  SHORTFRM->ACT2
@ 12, 34  GET  SHORTFRM->ACT3
@ 12, 38  GET  SHORTFRM->ACT4
@ 12, 42  GET  SHORTFRM->ACT5
@ 13,  3  SAY "What Turns you On"
@ 13, 26  GET  SHORTFRM->TRN1
@ 13, 30  GET  SHORTFRM->TRN2
@ 13, 34  GET  SHORTFRM->TRN3
@ 13, 38  GET  SHORTFRM->TRN4
@ 13, 42  GET  SHORTFRM->TRN5
@ 14,  3  SAY "Qualities you Like"
@ 14, 26  GET  SHORTFRM->QUA1
@ 14, 30  GET  SHORTFRM->QUA2
@ 14, 34  GET  SHORTFRM->QUA3
@ 14, 38  GET  SHORTFRM->QUA4
@ 14, 42  GET  SHORTFRM->QUA5
@ 14, 46  SAY "People Most Comf/with"
@ 14, 69  GET  SHORTFRM->CMF1
@ 14, 72  SAY "an"
@ 14, 75  GET  SHORTFRM->CMF2
@ 16,  3  SAY "THE COMPUTER MATCH FOR THIS SEARCH IS ===========>"
@ 16, 54 GET SHORTFRM->RESULTS PICTURE "999-99-9999"
@ 11,  2  TO 15, 77
@  4,  2  TO  9, 77    DOUBLE